R Notebook

knitr::opts_chunk$set(warning = FALSE, message = FALSE)

source('utils.R')

plot_distance_N(df_dim,t = 5000,f_empty_topics = TRUE,comparison_group = 'pairs',distance_formula = 'cosine', plotly = TRUE)

plot_distance_N(df_dim,t = 5000,f_empty_topics = TRUE,comparison_group = 'pairs',distance_formula = 'kullback-leibler', plotly = TRUE)

plot_distance_N(df_dim,t = 5000,f_empty_topics = TRUE,comparison_group = 'diff',distance_formula = 'cosine', plotly = TRUE)

plot_distance_N(df_dim,t = 5000,f_empty_topics = TRUE,comparison_group = 'diff',distance_formula = 'kullback-leibler', plotly = TRUE)

plot_distance_prop(df_dim,t = 5000,f_empty_topics = TRUE,distance_formula = 'kullback-leibler', plotly = TRUE,
                   regions = F)

Error in `filter()`:
ℹ In argument: `Type != "Emmigrant"`.
Caused by error:
! object 'Type' not found
Backtrace:
 1. global plot_distance_prop(...)
 4. dplyr:::filter.data.frame(., Type != "Emmigrant")
 5. dplyr:::filter_rows(.data, dots, by)
 6. dplyr:::filter_eval(...)
 8. mask$eval_all_filter(dots, env_filter)
 9. dplyr (local) eval()